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THIS FAL ISSUER is the last for the 1980 fiscal year. The next issue, 


November, will be the first of Volume Three. Again, we've had a number 
of issues over and above the guaranteed minimum of 6 per year, and 
actually more pages than last year's volume. The main reason to stop at 
_eethis point is to allow my wife and myself the luxury of a month's 
.  vaeation to celebrate our twenty-fifth anniversary. Hopefully, the extra 
' material in this issue will tide you over until we return and have the 
| opportunity to prepare the next issue from all the material you will 
have continued to send in. While we will have a house-sitter, there won't 
be anyone around to do anything about telephone calls. Mail will be 
picked up by one of the local elves, if an "A" or "ARCADIAN" appears on 
the envelope. 



























SINCE, this is the end of Volume Two, it follows that subscriptions for 

Volume Three are now due. I'll continue the guarantee of at least 6 

issues, aS I have in the past. There were 5 'extras' in Volume One and 

4 in Volume Two under that scheme. The rate for the next Volume will be 

$12.50, partly in anticipation of a postal increase rumored for November, 

partly to worry about the proposed 9-digit Zip Code we may have to 

reprogram the address list for, and partly to allow for some increase 

in productivity in preparing and distributing the paper. For example, 

st takes 2 hours of work per 100 copies, between receipt from the printer 
.. and delivery to the post office. I'd like to decrease that labor cost 

and mechanize the operation a little more, but that costs money. Recall 

that this is a part-time hobby operation, and there are other things that 

call upon my time. 


AN INCREASE in the number of subscribers would be a more palatable way 
to increase revenues, so why don't you make it a personal goal to induce 
a Bally buddy to have his own subscription, and I'll consider a rate 
reductionee. Each of the little projects and publications is priced to 
stand alone, but a peculiarly large amount of money is consumed by the 
little nickle and dime (quarter and half?) things like extra postage, 
telephone, gas to the printer, lost mail, etc., that in the aggregate 
become a considerable sum. ; 


(ii pil are encouraged, for when a couple of owners can get together, 
more iS accomplished than when working alone - mutual assistance,- etc. 
We've identified a couple of these in past issues and would like more to 
be developed, especially as we get into more complicated subjects. To 
further this concept, I'll send additional copies of the ARCADIAN to the 
same address at a reduced rate - three or more copies to one address at 
$8.50 per subscription. 





WHEN SENDING your subscriptions for next year, it would make things 
easier if you would put an "S" on the envelope and we can channel 
‘those into the right. pile to get the next year's address labels 
... made up as soon as possible. ) 


© 1980 Robert Fabris 


EIGHTY-SEVEN 






















a 3 
a 


ARCADIAN 


” 
MORSE CODE CENHANCED & CORRECTED) 

1@ :RETURN ;CLEAR ;NT=1 . 
24 BC=RNUD (32 )b8;FC=BC+4+RND (32968 
i 
i 
| 





3@ PRINT ;PRINT ° MORSE CODE _ MORSE CODE MODIFICATION by Bob 
46 PRINT ; INPUT " SPEED?"D Weber adds a little enhancement 


45 PRINT ;PRINT “TYPE WORDS RUN FOR CODE | by adding a question at the end ~ 


54 PRINT ;PRINT "YOUR MESSAGE: - -. ‘press PRINT to repeat the méSsage, 


56 PRINT ;B=6 , 
7 REY 6 Bee : .. Press ERASE to start a new one, & 
- 78 B=B+1;N=KP;IF N=t@AGOTO 286 press + to add to the message. 


aa @CBISN; TVEN5 CF N=31B=B-2 
a6 GOTO 7H 
744 CLEAR ;FC=@; BC=3; P=@; CY=4@;F OR A=1TO B-1 
218 P=P+1;1IF P=1@P=4; CY=46 
226 N=@C AI; NT=8;TV=N;PRINT “ ° 3 NT=D 
234 IF N<44G0TO 388 7 
246 IF N>SM@GOTO 388 
256 IF N=47GOTO 388 
464 IF NOS7IF N<B5G0TO 3288 
27H GOSUB Nbi@ © 
275 FOR C=1TO 25bD;NEXT C 
2684 NEXT A 
298 GOTO 1684 
340 TV=31;PRINT ;FOR C=1TO 25bD;NEXT C 
316 GOTO 286 ‘ 
Utilize lines 440 through 1000 as written, with the two corrections added below. 


“1885 CLEAR ibe % 
1914 B=B-1;NT=@;FOR C=iTO B S 

1928 TV=@(C);NEXT C;PRINT 

183@ PRINT "END OF MESSAGE 


1940 IF &(2@3=16B=B+1;GOTO 206 Bob Weber 
1964 IF. &( 2@)=8B=8+1;@CBI=32;PRINT “INPUT *;GOTO 70. Algonac, MI 48001 
1a76 GOTO 1844 ~ : ‘ as ~ amttis Ralgdkithe sited geeky Fen tie cbainn Sabena int tae cara maiomes A 


There were two errors in the listing on p.81: 
change 660 to read PRINT"Q#P Q Q Q"; RETURN 
/ change 460 to read PRINT’Q O66 Q ff Q QPf"sRETURN 
SALVAGE BOARD CHECKOUT described on p. 80 has a partial error in table 
Ze 1 identified chip U14 and pin 16; but it should have been chip U14 
and pin 6, as was mentioned in the text. 


XAHTZEE ADDITION CORRECTION. The modification presented on p.82 made 
e dice nice and big, but I made two errors, in lines 380 and 385. 
Change the first command in each to have a> instead of =, so they read: 
360e0IF ZR sa 
7 385 IF 23. os. 


ATTACK MODIFICATION REBUTTAL Carl Morimoto, author of ATTACK, indicates 
that the modification I presented on p. 67 will cause the piece to move 


in two-square increments, which is not the intent. Pieces must stay 
within the wall constraints. 


1850 IF &(21)=16RUN | 6594 Swartout Rd. | 
\ 


BASE CONVERSION by Ron McCoy puts it all together. Now you can have one 
program that will convert from any of the numerical systems into the 
other four, rather than have to use individual programs. If you start 
with decimal, the program takes the whole number in one piece and converts 
it. If you start with any of the other four, you have to enter each aiecit: 


as with Hex- to enter 23AC, enter 2GO0 3 GO AGO CGO and thats it. 
eee =F t ee ee 











7a 

92 
1ae 
189 
118 
128 
138 
149 
158 
168 
179 
18a 
198 
208 
218 
228 
239 
248 
258 
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278 
288 
298 
38a 
3il 
312 
313 
314 
315 
316 
317 
1318 
319 
328 
321 
322 
323 
374 
33a 
339 
348 
35a 
36a 
376 
388 


1396 


448 
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.-52=385 

> RETURN 

CLEAR 

PRINT “INPUT KNOBN BASE te 

PRINT " B,D,H @R O";PRINT. | Ron McCoy 

P=KP;IF (P="B")+(P="D")+(P="H" )4(P="0" GOTO 68 7509 W. River Rd. 
PRINT "“*INJALID-TRY AGAIN*";GOTO 248 satan wet MN 5 Sty 


IF P="D" INPUT "INPUT #"S:GOTO 248 
PRINT “INPUT CH LEADING as 

IF P="O"GOTO 188 

IF P="B"GOTO 51a 

-HEX TO DECIMAL - 

A=18;B=11;C=12;D=13;E=14;F=15 

PRINT "4 DIGIT HEX # © 

INPUT W,X,¥,Z 

IF (W>74+0X91540Y91594(2>15 PRINT “Tao BIG";GOTO 120 
S= (4GSBbW )+( 256K )+¢ 1GbY )+Z us 

GOTO 2279 

.8CTAL TO DECIMAL 

PRINT "S DIGIT @CTAL ¥ 

INPUT V,W,X,Y,Z 

IF CU>7)4+CW>7 340 Y>7)40Z>7 PRINT "Tea. BIG":GOTO 188 

S=( 4496bYV )+¢ Si2bh +0 64bX +0 8bY 42° 

PRINT ;PRINT #1,5," DECIMAL 
-BINARY TOG DECIMAL 
















418 W=W+48 

























ome eg aia on to Sera 
A V=0+ + i 
egestas 438 USL4+(2bK)+( 4b 7) 
ape b | 448 T=1+( 2bH)+( 4bG) 
sere ees 450 S=F+( 2bE)+(4bD) 
GoTo 33a 46@ R=C+(2bB)+( 4bA) 
inion 486 TV=W3 TU=X3TU=¥3 TU=Z;PRINT * HEX 
pele | 498 PRINT. #1,R,S,T,U,V," @CTAL 
L=RM clea SOA PRINT $60TO 2600 
K=RM Sop oS 8 S89 ‘PRINT "Tae" BIG 
J=RM 2 af 514 PRINT "15 DIGIT BINARY # 
T=em of i 520 INPUT A,B,C,D,E,6,6,H,1,3,K,L,M,N,O 
H=RM . | $30 TF _CADLD#CBD1+CC>1 4 D1 HCE ST IFCESLIFC@DT FEED eC TOT F 
G=RM - CTPLIFCKDL + CLOT IF (M91 +0ND1 40091 GOTO Seo 
phi 540 ake ee CSLOPSE ){ ABSEBETSCREABED) +CLO24BE J+(6126F 1+ 
EerM Sc (256bG )+( 128bH +0164 bT )+( 32bT 3+¢ 16bK + BbL ) 
rusia } 550 S=S+(4bM)+(2bN)40.. 
C=RM Sei GOTO 229 © oS 
B=RM : == 


A=RM; RETURN : SAEs 
PRINT #1, A,B,C," "2D,E,F,G," "sH,I,J,K, * “,L,M,N,O," BINARY 
. BINARY TO HEX 

z= =O+( 2bN)+( 46M )+C BBL 5 IF Greene he 
2=2+48 

Y=K+( 2b +C4bI)+(8bH); IF YoSV=¥+7 
Y=7+48 

A=G+( 2bF +0 4bE34+(SbDI;IF K>Gx= Ree 
A=K+4B 


W=C+( 26B+€ 4bA)} EIGHTY- NINE. 
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BALLY WAS SPOTLIGHTED during Personal Computing 80, the fifth annual 
personal computing and small business computer show, held in | 
Philadelphia on August 21-24. The "largest personal computing show 
in 1980" devoted 25 hours during the Visual Arts Festival held on 
Sunday and sponsored by the Philadelphia Area Computer Society, to 
the Bally Home Computer System. The topic, “Low Cost Pixel Art" was 
presented by Zuszsanna Molnar and Frank Dietrich of Chicago Circle, 
University of Illinois and Professor Lou Katz and Jinko Gotoh of 
Columbia University. Discussions supported by video tape included 
interactive programs for graphics, real time animation, and the new 
Bally ZGRASS System. The marketing tape on the ZGRASS system ($2800 
with monitor) was quite impressive: four times the video resolution 
of the current Bally Arcade, 64K of memory, floating-point arithmetic 
with trig functions, and other great features. Topping the show off 
with a visit to the Bally Park Place Casino in nearby Atlantic City 
made it a memorable weekend - (No winnings to report! ) 


(above report direct from Karen Phelps Cravedi of the Tidewater 
Computer Club - I can use more ready-to-print material, thanks Karen) 


PROGRAMMING HINTS listed below were extracted from an article by Steve 
Kimmel in the August Creative Computing (p.64) are are submitted as 
guides for the types of programs to write: 
o Don't write the program if you are going to do the job only once or 
twice a year. 
. © Don't write a program if a human could do the job in less than 
5 minutes. 
o Don't write a program if you could do it better with a calendar and 
pencil, file boxes and cards, or a calculator. 
o Don't write a program if you don't need the accuracy, 


TOUCHTONE modification by Rich Tietjens, now settling dow at 
Monterey ,CA for a few months. —_ ~ 


65 IF ((N 47)4(N 58))= anche leg oe re 
BF GATS SB hth en ae 99) -Alime2) (035) GOTO 76 


287 C=119; R=188; RETURN 

294 C=146; R=188; RETURN 

317 C=109; R=253; RETURN 

318 C=109; R=230; RETURN. 
319 C=109; R=208; RETURN 
— 320 C=109; R=188; RETURN 

BTR program by Ron McCoy is a challenge. Modified from a program in the 
June 1979 Personal Computing, it sets up a 9x19 grid on the screen. 
Fifteen "walls" are randomly placed in the squares, and the 15 "bots" (*) 
are also randomly placed. Then your position is similarly located. 

_ Hand controller 1 is used to move the target (you) in any of the eight 
available directions, or stand still, and the trigger makes it happen. 
(The knob is USed to turn a little indicator to the desired direction. ) 
After you make your move, all the bots start to advance upon you, one 
square at a time, each. If they hit a wall, they disappear. The object 
is to wipe them out, but it is a difficult job. You have to maneuver 
yourself so that the bots keep hitting walls. I kept saying 'next time 
I'll get them', to no avail. 
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38 
48 
58 
68 
7B 
88 
38 
186 
118 
126 
138 
148 
156 
168 
178 
186 
136 
266 
216 
228 
238 
244 


| 258 


268 
27 
238 
298 
388 


| 318 
320 I 


336 
346 


358 IF 


368 


378 


388 
398 
446 
410 
428 
438 
446 
456 











. BOTS 
.BY RON MCCOY 

: RETURN 

CLEAR 3;BC=@;FC=142;R=15 

PRINT “B@TS ARE *. I’S ARE 
PRINT “WALLS. B&TS M@UE AT YQU, 
PRINT “BUT DIE IF THEY HIT A 
PRINT “WALL. KN@B P@INTS WAY, 
D=689;1=658;L=798 

PRINT “TRIGGER MAKES M@VE. 

FOR A=1TO S99;NEXT A 


464 NEXT A 

47@ IF V=1C=M;GOSUB L;GOTo 249 
486 GOSUB 75@;R=R+1 

4936 PRINT “H@T DAMN! Y@uU HaN! 

568 GOTO 538 

‘31@ GOSUB 75@;R=R-2 

‘526 PRINT "DRAT ! 

936 PRINT "WANNA RERUN? 

54@ PRINT #1,"IT’ CL BE “,R," BOTS 
258 PRINT "1=¥YES 


}\56@ A=KP 
C=@;V=1;N=6; CLEAR 576 IF A="1"GOTO 3a 
FOR Y=-32TO 4@STEP 8 58a STop 


FOR <=-7@TO G3STEP 7 
C=C+1;@(C)=6; BOX X%,Y,6,7,1 
NEXT 


660 X=RND (2@0)b7-77 
616 Y=RND (10)b9-49 
626 0=X; P=; RETURN 


NEXT v (658 T=28b( +32 )¢8 
FOR A=1TO R 668 S=(%4+77 67 
GOSUB D 67@ C=S+T: RETURN 
GOSUB I 


708 P=(28G-C Jc 28+1;P=11-P 
(718 O=C-( 20bP )+28 
| (26 P=8bP-48;0=7b0-77 


IF @CC)#@GOTO 184 
CxX=0; CY=P; TU=73;@(C)=73 


e 


ee : 738 X=0; Y=P;RETURN 

F = 758 CX=-78;CY=CY- 16:RETURN 
GOSUB D ‘888 GOSUB L 

GOSUB I : 


‘826 IF O>3 K=x-7 
{| 838 IF O<J X=xK+7 
‘640 IF PK Y=¥-8 
858 IF PCK Y=7+9 


IF @®CC)#@GOTO 168 
CX=0; CY=P; TU=42; @(C)=1 
NEXT A a 
GOSUB D 
GOSUB I 
IF @(C)#@GOTO 210 
FOR B=1TO 758 
BOX 0,P,7,7,2;LINE 0,P,4:BOX 0,P,2,2,1 
Q=(KNC 134127 )¢28 
IF Q=1LINE 0,P+3,1;M=2@ 
IF Q=2LINE 043,P+3;1:M=21 
IF Q=3LINE 0+3,P,1;M=1 
IF Q=4LINE 0+3,P- 3, 13M=-19 
IF Q=SLINE O, 
IF Q@=GLINE 0 3; 
IF Q=7LINE 0-3,P,1; 
6) 
> 





868 G= Xs H=¥ 
878 GOSUB Ir 


| 888 IF @(C)= 43CX=G; ‘CY=H; TV=79; GOTO Sig 
896 IF @(C)=73B0x 0,P,6,7,1;@CAI=9; RETURN 
366 V=1; @CCI=N+1; CX=G; CY=H; TU=42; 

BOX. ‘0; P, 6, 7, 1; RETURN | 


IF Q=8LINE 
IF €Q¢1 40 Q38 Mem a ee or | 
IF TRC1)BOX 0,P,7,7,2;BOX 0,P,6,7,1;GOTO 4a. 
NEXT BO | 7 
FC=@;IF TRC1)FC=142;GOTO 248 © 

GOTO 38a | 

@(C)=0; M=M+C; C=M 

GOSUB L 

CX=0; CY=P; TV=43; @(M)=43 

J=0;K=P; V=6;N=N+1 

FOR A=1TO 2aa 

IF @(A)J=N C=A;GOSUB 82a eee 


» NINETY-ONE 
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38 
186 
119 
124 
138 
148 
154 
AS 









.COUNT THE DOTS * 


: af: —— - 
-(C) 1988 L. & M. PORTER 7 bia ies 


INPUT # OF ROUNDS OF COUNTING ?";INPUT xX 
IF «<1GOTO 46 
IF X>S4NT=3 

TF <>54PRINT “SMALLER # OF ROUNDS ";PRINT "PLEASE! ";NT=@;GOTO 42 


NT=8 ay 
H=@; I=@;£=@;0=6 4. | 
G=8;L=@ : 

R=6;M=@; Q=8;W=8 

P=@; B=8; C=@; N=8 

CLEAR ;PRINT " 


CLEAR 3PRINT “INPUT DIFFICULTY";PRINT ;PRINT “1-HARD TO S@@-EASY"; INPUT D 


IF D>S@BGOTOC 58 

IF B<1icoTo s@a 

CLEAR ;BC=249;FC=7 

FOR A=1TO RND (173 

BOX RND €5@)-25,RND (44)-22,1,1,1 
NEXT A 

FOR Z=1TO D 

IF TRCL3=1GOTO 158° 

NEXT 2 

CLEAR ;PRINT 2 : 
IF 2=1NT=5;PRINT "DON’T CHEAT BY HOLDING *;PRINT “THE TRIGGER IN“;PRINT “NO 


W, GET READY GO!";NT=@;GOTO 86 


168 
178 
175 
177 
198 
2az 
2a5 
207 
208 
218 
| 238 
. 248 
258 
268 
278 
288 


285 


298 
388 
318 
328 
Bak 
336 





PRINT “YOUR COUNT?"; INPUT K 
Q=Q+Z 

IF K=AQ-1 I=I4Z 

IF K#A-1 W=W4z 

IF K=CA-L)PRINT “RIGHT! “;IF K=(A-1) B=B+l 

IF K=A-1 IF A-1>=9 P=ABS(8-C(A-1)) 

IF K=A-1 IF A-1<9 P=B 

IF A-1>=9 E=E+1 

IF K=A-1 H=H+#P . 

IF K=(€A-1)G=G4+(A-1) ots 

IF K#CA-1)BC=93;PRINT “SORRY PAL":IF K#CA-1) C=C+1 

PRINT “DOTS ",#1,A-1 

PRINT “RIGHT ",#1,B 

PRINT. "WRONG “,#1,C | 

FOR J=1ToO Sap ) 

NEXT J 3 

BC=249 ; : 
N=N+1 | 
M=M+CA-1) 7 | 

R=R+K . 

IF N=XPRINT “GAME OVER me , | 
0=688-D : 

L=(6@8-D bx 


4 V=Lecd 


F=(Eb( Uc 19 )+E+B+H+G+C ( (ObB)-I)c1@))c1@ 


NINETY-TWO soneicetestninmaicnnl 















e w 
Py 3 








. “ARCADIAN KK ™ —— 
: , 7 a 
Oe 
366 IF N=XPRINT "CORRECT COUNT=",#1,6 
398 IF N=XPRINT "ADISTO DFCLTY FCTR=",#1,U,#1,".", €RMb1@)cQ 
466 IF N=XPRINT *TOTAL.“ INPUT “,#L,M,"“",#1,R 
47H IF N=KPRINT "TIME-USELB "#1, CD+1 bx, #1, °°" ,#1,0 
475 IF N=xKIF B+G+E+H< 2S5CoTO 465 ; 
$3@ IF N=XPRINT "REACT TIME/CRRCT RND=",#1,IcB 
444 IF N=XPRINT “AUG REACTION TIME /RND=", #1, CW+I IcX a 
456 IF N=xXPRINT "ALOTD‘USED “, HL, CCDtLIbAICM, #1, °.°, CRMbIB ICM, "“", #1,QcM,#1,".* 
»(RMbiIBIcM 






















451 
452 
466 
465 
478 
472 
473 
488 
4368 


566 


4 


iF 
IF 
iF 
iF 
IF 
IF 
IF 
IF 
IF 


=*%7GOTO 


IF 


518 GOTO 68 


COUNT THE DOTS program puts 


max 17) for a short period of time and as soon : 
a the trigger to stop’ the clask, ge are caren 
pade the computer will keep track of the Score. "DIFFICULTY" 

° sets the 
timing. By Changing the X and Y valu -, you change the size of the 


playing field. On the surface, this seems to be 
if we look a little deeper, we can see an a ae eee ee 


ophthalmology - checking field of view of one's eye, 
etc., and other ideas having to do with perception can be developed. 


Les Porter, Box 61 Claude, TX 79019 


BALCHECK ‘For those of you technical types that obtained the material 
offerred in the last issue, here is a parts layout of the pe board as 
was produced by Bally: 


N=<PRINT "“USED’CORRECT DOTS=",#1,QcG,#1,".",(RMb1@)cG 

N=XPRINT “FOR HARD RNOS=", #1, QcCH+(9bE)),#1,".", CRMb1@IcCHt+( GbE} 3} 
N=<XPRINT “# OF HARD RODS=",#1,6," ABS=",#1,EbB+H+G+(((ObB)-I)ci@) 

N=% IF X<i@PRINT "18 RDS + FOR PRAC. SCORE; TRY AGAIN";GOTO 48@ 
N=XPRINT “PRAC. SCORE=",#41,F 

FT T=F 

N=XPRINT “HI SCORE=",#1,T 

N=XINPUT "“SAME=1 NEW=2"°U H 
N=X IF U=1 H=@; [=@;£=8; 0-8; G=8;L=@; R=0; M=@; Q=@; W=@; P=@; B=@; C=@; N=@; D=D; X 
68 ; 
N=XIF U=2GOTO §S 





up a random number of dots on the screen 


and enter the amount in the key~ 


pplication in the field of 
blind spot size, 
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5 
5 
if 


28 


7B 
148 
288 
205 
216 
226 
225 
256 
548 
561 
583 
5S 
514 
a = 
520 
525 
526 
534 
535 
S37 
548 
545 
554 
558 
565 
574 
572 
575 
576 
584 
585 
5568 
595 
597 
668 
6514 
615 
618 
624 
625 
638 
635 
666 
6565 


< Bc rican 


-CONNECT FOUR 

_BY BOB WISEMAN 

GOSUB 9aA 

A=1;GOSUB 2@8;GOSUR 728 

IF EGOTO 1a8 

A=2;IF B=1GOSUB 58a Bob Wiseman | 
IF B=Z2GOSUB 228 118 St. Andrews Dr. 
GOSUB 7@8;IF EGOTO 102 Cincinnati. OH 45245 
GOTO 20 

GOSUB 928;GOTO 1B 

CX=-773CY=4B . 

PRINT "PLAYER",#2,A,"-ENTER COLUMN ", 

K=KP; TU=K3 X=18bK-528 

Y=28:GOSUB 975 

IF I#@MU=78;MU=49;GOTO 205 

RETURN 

H=30000; Q=-H; C=8; CX=-77;CY=48 

NT=0; &( 21 =15;8(22)=-1;R=0 

PRINT “NOM I WILL FIND A MOVE “, 

FOR X=-3ATO 3@STEP 19;Y=-38;R=0 

GOSUB S75:IF I>@Y=Y+19;GOTO S19 

IF I<@GOTO BBB 

N=4-ABS( XbY 3c 1G; W=*; Z=¥3 K=8 

FOR L=-1TO 1;FOR M=-1TO 1 

BC 16 3=X+303 &C 17 =2ObL +20; &( 18 )=Mb3G+30 

K=WsY=ZiIF L=@IF M=BGOTO S7a 


F=3;K=K+1;P=4 

&C 195 3=Kb1i5 
X=X+16bL;Y=7¥+18bM;GOSUB 975 
IF F3F=1 


IF I<iGoTo 565 

IF I=F P=P+2bI-3;GOTO 549 

R=R+ABS(P );@(K)=P;@(K+9)=I 

NEXT M;NEXT L 

IF R=@GOTO 625. 

FOR M=1TO 9; I=@(M);J=@(9-M) 

&C19)=Mb17 

L=J+1;P=@(M+8);R=@C17-M) 

IF (L=3)+¢I=3)D=H 

IF (L=-3)4¢€ I=-3)D=D+5aa 

IF I>@D=D+i;IF P=8D=D+1 

IF I#@D=D+1i;IF P=@D=D+1 

IF (€(€¢€ IbI=4 b(J=@))+CL=2) )b(P=8 )b( R=6 D=D+198 
NEXT M 

IF (€@(2)<@)+€@(3)<B)4+(@(7 XK B)4+(@(8)<BIGOTO 62H 
GOTO 625 

A=1; X=; Z=Z+18;GOSUB 72@;IF E=1 E=8;D=D-Hc1@ 
A=2; X= 

IF D=G@IF RND (3)=1 Q=-H 

IF D>@ C=W;Q=D 

NEXT %3;X=C 

&(19)=8; &(193=8;NT=1; &( 28)=@; RETURN 
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1@ 
24 
38 
35 
36 
46 










| 


‘ 

Y=2 

Z=¥ 

Y= 

Y=Z3 
728 K=@;FOR L=-1T0 1 
725 FOR M=-1TO 1;IF M=@IF L=@GOTO 758 
738 K=K+1:%=H5 Y=23 P= 
735 X=X+1@bL;Y=V¥+1@bM;GOSUB 975 


74@ IF I=A P=P+1;:GOTO 735 
745 @CK)=P 

75@ NEXT M:NEXT L 

755 FOR K=1TO 4 

768 IF @(K)+@(9-K)>2E=1 

765 NEXT K;CX=CX-6; TU=32 

778 X=W 

73@ RETURN 

8@8 CX=-77:CY=48 

8@5 PRINT "GAME OVER -- 4 IN A ROW" 
818 PRINT "PUSH GO";K=KP3; RETURN 
9@@ CLEAR ; INPUT "#PLAYERS?"°B 

985 IF B>2GOTO 3aa8 

91@ CLEAR ;E=@;NT=1; BC=47;FC=98 
915 BOX @,-5,71,61,1;1=08 

928 FOR X=-38TO 3@STEP 18 

925 FOR Y=28TO -38STEP -18 

938 GOSUB 95@;NEXT Y¥3;NEXT x3 RETURN 
958 BOX X,Y,9,9,2 

955 IF I=1BOX X,¥,7,7,1 
968 IF I=2B0X X,Y,7,3,1 
965 MU=(X+¥+5@ bI 

978 RETURN 


3;BOX X,¥ 
3BOX X,7,3, 


S75 IF CABSCX)>38)4+0Y<- ~30)4¥>20)1=-15 RETURN 


T=PXCX, Y+PXCX, ¥+3)3; RETURN 






AIRBRUSH ~ 
. AND 

. SANDBLAST 
.USE KNOB FOR SPRAY — 

-ANT FARM (C. SCHREIER )/C#. dub 


CLEAR 
K=K+IKC1) 

Y=Y+JYC1) 

A=( 1284+KNC 1) cBtL rue 

“oe 5h 

BOX X+RND cA) sRG2, Y+RND (B)-Bc2,1,1,3 
GOTO 20 , 
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4 .SPIRALS 2 
5 .BY MATT GIWER 
6 NT=@ 
18 CLEAR 
| 188 A=3 
| 2866 B=RND (2) 
218 C=RND (2) 
| 880 X=B; Y= 
/85@ FOR D=1ToO 199 
| 928 X=X+B 
985 Y=Y+c 
987 IF X>75¢60To 109 
3@8 IF Y>45Go0Ta tag 
914 GOSUB 1@598 
958 NEXT D 
998 GOTO 18 
1659 .M 


i166 LINE X,@,A 
-197@ LINE @,-Y,A 
(1998 LINE -x,@,A 
1118 LINE @,Y,A 
1288 RETURN 
9908 .M 
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GRAPHICS ASSEMBLER is a programming aid for those of you who want | 
to construct Shapes using the box canmand. Instead of using paper and 
pencil to figure out where you want the various boxes, this program 
allows you to set up a box size, move it around the screen to where 
you want it, and freeze it there. The coordinates of the location are 
now in memory, using the following instructions: 

Use trigger to start system after pressing RUN/GO 
Enter X and Y coordinates of box size 

Inter type of box (1-4 per BOX command) 

Move joystick to desired location 

Press trigger to freeze box location. 

It will list the command to tape at any line number you select. It 
will also save a number of these commands and place them all on tape 
with a uniform line spacing. This will take place if you command 
"RECORD PROGRAM". This program was developed by Hugh Fitler 


355 :RETURN :;NT=@ 

368 PRINT 

365 PRINT “TURN RECORDER OFF AND";GOSUB 6aa 
378 IF TRC1ICLEAR ;GOTQ 180 


















~ GRAPHICS ASSEMBLER 
»~BY HUGH FITLER 


nob woN 


> RETURN 375 GOTO 378 
NT=@ 466 @(NI=x 


18 N=@;X=8; Y= 
28 IF TRC1) GOTO 168 

38 GOTO 24a 

164 CLEAR ;IF N>@GOSUB 7ag 
185 PRINT "SIZE? 

11@ INPUT "K"A;IF AC1IGOTO 116 
126 INPUT "Y"B;IF B<1GOTO 128 
13@ INPUT “TYPE?"T;IF (€T<1)-€T>4)GOTO 138 
i4@ E=3 

156 CY=49;GOSUB 6@@;PRINT “ TO SAVE 
15S PRINT “PRESS - KEY TO REJECT BOX 
1S7 GOSUB 39a8 
158 IF N>@GOSUB 74a 

16@ X=K+IXC LI Y=¥4IYCL) 

176 BOX *%,Y,A,B,E; BOX X,Y,A,B,3 

18@ IF TRCLIE=T;GOSUB 88H;GOTO 498 
18S IF &(2@)=4IF N=@GOTO laa 

187 IF &(2@)=4¢G0TO 46a 

198 GOTO 168 

268 CLEAR ;CY=4@;INPUT °1ST LINE #?7"C 
218 INPUT "LINE SPACING?"F 

220 PRINT "TURN RECORDER ON AND";GOSUB 6aa 
239 PRINT ;PRINT aan 


416 @C(N+166)=¥ 
426 @C(N+2608)=A 
436 @CN+389)=B 
446 @(N+496 )=T 
45@ N=N+1 
GOSUB 854 


Hugh Fitler 
628 W. Utica St. 
Sellersburg, IN 47172 


BOA 


47@ PRINT "?"3;K=KP 

489 IF (K<"1")-(K>"2" GOTO 460 

498 GOTO (K-48 )biaa 

6@@ PRINT “SQUEEZE TRIGGER", ;RETURN 
7@6 FOR M=@T0 N-1 

718 BOX @(M),@CM+100),@(M+2a0), 


@CM+388), @(mM+4aQ) 
715 NEXT M 














EE A, A 


724 RETURN 


24@ IF TRC1):PRINT :GOTO 268 
258 GOTO 248 888 BOX X,Y,A,B,T;RETURN 
288 FOR M=BTO N-1 856 CY=4@;PRINT “ADD A NEW BOX rere 


868 PRINT “RECORD PROGRAM....2 
S65 GOSUB 92g 

S67 GOSUB 7ag 

878 RETURN 

386 BOX 8,CY,159,10,2 

316 BOX -55,-16,58,69,2 


959 RETURN | 
NINETY-S1X 


27@ PRINT #2,C,‘ BOX ", 
380 FOR P=8TO 4@@STEP 188 
31@ PRINT #1,@(M+P),;IF P<4@@PRINT “,", 
328 NEXT P 
_ 34@ PRINT 
345 Cc=c+F 
358 NEXT M 
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MORE ADD-ONS are in process to expand the utility of the Bally machine. 
A ese items will use the capabilities of the Blue Ram to one extent 
or another. These add-ons will be available in the form of kits, as well 
as completed equipment, and take the form of adapters, to be plugged 
into the socket on the top of the Blue Ram. The kits will include the 
supporting programs and documentation. The first kit will be for the 
full size keyboard addition, and will be available on October 176 


KEYBOARD ADDITION: This kit at $24.95 provides the hardware and software 
needed to attach a JAMECO 610 Unencoded Keyboard to the Blue Ram. The 
JAMECO address is 1355 Shoreway Road, Belmont CA,94002, and the current 
price is $34.95. Should you desire a wired and tested combination, the 
package price is $89.95. Please order the keyboard direct from JAMECO- 
it just saves the double Sshipping,etc., and we don't have to inventory 
them. When the package is attached to the Bally via the Blue Ram, with 
its 36" cable, you will have; | 

Full 96 character ASCII codes, including control characters 
Special Words Keys 

Modem compatible functions 

Compatibility with the new Extended Basic 

Complete support program and documentation 

An attractive partial enclosure 

Maintenance of the Tape Cassette Interface 


FUTURE ADDITIONS: 
Oo e next kit will be the home control module that will use the 


common BSR "X-10" system. Be sure to purchase the command module that 
contains the ultrasonic receiver since the mode of operation of the|Blue Ram 
_ Module will be to send the proper ultrasonic Signal to the BSR unit, 

Which will then act as though you made a manual input. This would be 

a great utilization for a salvage board, as you could program the Blue 

Ram through your regular machine and its Tiny BASIC, then transfer the 

Blue Ram to the salvage board (maintaining power on, of course), and 

the salvage board would then perform the programmed operations. 


SCoo0o0o0000 


° Then we will provide the software necessary to have the Blue Ram. 
act as a compiler for music programs. Using Processor Technology 
format, one can simply enter musical selections and the software will 
convert that into the proper language that the Bally can understand. 


° After that, we will produce the modem addition, to allow two- 
way telephone communication, using a commercially available modem 
device. Again, the addition will provide the intelligence to make the 
Bally and modem operate together. The Cassette Interface will be 
operable with this addition, to allow material to be taped on and off 
the telephone line. ) : 








As each of the above gets closer to production, we will report more 
fully. The schedule now has the control module available in mid-November, 
the compiler program in December. The Extended Basic cartridge is 
essentially complete and should be available by the end of the year. 
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BLUE RAM PRICE CHANGE has become necessary because of 
unexpected costs which have been steadily mounting. 
Effective IMMEDIATELY, the $60 and $70 kits are 
discontinued. The full $130 kit and the wired $170 kit 
will be subject to a $10 increase each after October 15, 
1980. We regret having to take this measure but it is 
necessary if we are to continue our broad support. 


HYBRID PROGRAMS TUTORIAL. Hybrid programs are those wich 
contain both machine-code program segments and BASIC 
program segments. The BLUE RAM UTILITY, the BLUE RAM 
DIAGNOSTIC, and the resistance measuring program from the 
last issue are three examples of hybrid programs. Transfer 
to the machine-code segment is via a CALL nnnnn statement 
in BASIC where nnnnn is the location of the machine-code 
routine being referenced. Transfer back to BASIC is via 

a C9 return instruction in the machine-code program. The 
advantage of using machine-code program routines is that 
they run several orders of magnitude faster and can easily 
perform logical type operations such as ANDing and ORing. 
It is, however, very important to remember several NO-NO's 
in conjunction with hybrid programs written under the 
current Bally BASIC: 

1. Machine-code programs must not write into RAM 
areas occupied by the BASIC program. This means that many 
of the powerful built-in routines for graphics cannot be 
used without some care since the BASIC program is written 
in screen memory. 

2. The DE register pair of the Z80 is used by BASIC 
to keep track of where it is in the BASIC program. The 
machine-code program must return it to BASIC with the 
original value if the BASIC program is to resume beyond 
the CALL to the machine-code program. 

3. "Background" processes, running machine-code 
programs must also call 20B0 in order to provide BASIC with 
its background processing. : 


The last rules will be more meaningful as we proceed. 


DUMPING AND LOADING HYBRID PROGRAMS is quite simple using 
the BLUE RAM UTILITY. The utility contains facilities for 
entering and dumping the machine-code portion. Bally BASIC 
is used in the normal way to dump the the BASIC portion. 
Here is a step-by-step procedure: 

1. Connect the BLUE RAM, insert the BASIC cartridge, 
and press RESET. Both BLUE RAM switches should be up. 

2. With the BLUE RAM UTILITY tape in the player and 
rewound, enter: :INPUT GO. This step will load the BLUE 
RAM UTILITY. Note that there seems to be a pause after a 
the first statement. Since the first statement does not 
have a line number it is executed immediately upon receipt. 
The effect of this statement is to continue to load data 
from the tape and place them in the BLUE RAM memory. They 
are not printed and therefore nothing is seen as they are 
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loaded. The &(192)=0 in the statement places the BLUE RAM 
memory in the RAM mode so that it can be written into. The 
&(64)=0 at the end of the machine-code segment load switches 
the mode back to ROM. It is important to remember that just 
loaded memory is left in the ROM mode and cannot be written 
into further without switching it back to RAM either manually 
or by program statement. The load is complete when the 
screen is cleared except for "BLUE RAM UTILITY 6000" at 
the top. Stop the tape at this point. 

3. Once the BLUE RAM UTILITY is loaded it can be used 
to enter a new machine-code program or modify an existing one 
(already in BLUE RAM memory). Note that the utility switches 
the memory mode to RAM and back to ROM when changing memory 
contents so it is unneccessary for you to ensure that memory 
is in the RAM mode. 

4, The machine-code segment of a hybrid program should 
normally be written to tape first since most changes to a 
program are absorbed by the BASIC segment. To dump the 
machine-code segment, enter: PRINT followed by the 
beginning and ending addresses of the segment (in hexadecimal 
format), followed by the letter L to indicate to the loader 
that another segment (the BASIC segment) follows this one. 
The utility will instruct you to start the tape RECORDING 
and press GO when it has started moving and is past the 
leader, if any. The utility now proceeds to write the 
loader on the tape followed by the data. Since the data 
is machine-code and not ASCII characters, most of the data 


will show up on the screen as question marks and words with 


no context. This is the data that you don't see load when 
the machine-code segment is being loaded. When "END OF DUMP" 
is seen on the screen, stop the tape but do not rewind it. 

5. Press RESET to clear the utility program from BASIC 
memory. You are now ready to enter and dump the BASIC 
segment in the normal manner using the :PRINT ;LIST 
functions of BASIC. 


A few additional notes concerning the utility: The machine- 
code segment for the utility is at addresses 6C00 through 
6CA3. The addresses for the machine-code segment of the 
diagnostic are 7000 through 707E. Use these numbers in 
conjunction with the utility to dump extra copies of the 
utility and diagnostic. Also, by deleting the comment lines 
from the BASIC segment of the utility (lines 1 through 7), 
the program will run a little faster. Extra characters in 

a BASIC program nearly always make it run slower. 


HYBRID PROGRAM DATA TRANSFER is accomplished via the letter 
variables A through Z. The BASIC program can place parameter 
data into the variables prior to CALLing the machine-code 
routine. Likewise, the machine-code routine can return data 
to the BASIC program via the same variables. The letter 
variables begin at address 4E6E for A and continue by two 
for each succeeding letter, (4E70 for B, 4E72 for C, etc.) 
Hexadecimal digits have 14 »ossible values remember: 
0123456789ABCDEF so that» \ difference between 4E6E and 
4E70 is 2. Full word 280 ryjister pairs should be used to 
access these variables since BASIC treats them as full word 
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integers. Consider the following example: a 


6000 21 6E 4E 6E 26 00 22 
6007 70 4E C9 


10 A=28672;CALL 24576;PRINT B 


The BASIC program sets up an input address in variable A 
and calls the machine-code program (24576=6000 Hex). The 
machine-code program reads a byte from the memory location 
given to it in A and returns the value of that byte 25.6 
where the BASIC program can access it to print it. For 
those not familiar with machine-code programming, many 
excellent texts are available in self-teaching and cook- 
book style. Also, as people contribute useful machine- 
code routines, their practical use will be described and 
they will be added to a library of such routines. It is, 
therefore, not neccessary to understand how a machine-code 
routine works in order to use it in a hybrid program. 
You only have to know what it does and how to call it. 

\ 


BACKGROUND / FOREGROUND TUTORIAL. One of the best uses of 
a machine-code routine in a hybrid program is as a back- 
ground processor. The virtual effect is to split the Z80 
processor into two distinct processors: a foreground 
processor and a background processor. So complete is this 
virtual split that the resultant two processors can talk 
to each other as if they really were two separate Z80's. 
Like a bi-cameral mind, each half goes about its assigned 
duties totally oblivious to the other's status. The 
foreground processor is responsible for the primary logic 
of the overall program, gathering inputs and initiating 
new processes, usually without regard for timing effects. 
The background processor is triggered by an external event 
and responds usually with fixed logic and parameters 
Supplied to it by the foreground processor. The most 


common event trigger in the Bally Arcade is the screen 
interrupt which occurs 60 times a second. A background 
process tied to this stimulus will receive control at 

this 1/60th of a second interval allowing it to perform 
repetitive operations at that rate. BASIC uses such a 
background process to implement the note timer NT for 

the duration of the tone associated with a printed 
character. The foreground processor prints the character 
on the screen and then sets the value of the note timer 

in a special memory location for the background processor. 
After it prints the second character, it checks the special 
location for a zero value. If the value is not zero it 
continues to wait and check. If it is zero, it places the 
new NT value in that location and continues to print the 
next character. The background processor, operating at 

the 60x rate decrements the special location. Therefore, 

a value of NT=3 equates to a note tine delay during printing 


of 3/60ths of a second. The background process handles the | 
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free to continue executing the main program. The most 
Significant use of a background process tied to the 
Screen interrupt is animation. The trick of providing 
smooth animation, like any magic trick, is to perform 
the manipulation while no one is looking. Because of 
the scanning of your TV picture, a period exists 
between "frames" where the Sweep is returned to the 
top of the screen; a period known as vertical retrace. 
During this time, no information is being written to 
the screen. What you are seeing during this time is 
not screen memory but the fading image of what was in 
screen memory during the preceeding 60th of a second. 
It is during this time, therefore, that no one is 
"looking" at screen memory. By asking for the screen 
interrupt to occur at the end of the scan, about three 
milliseconds are available to change screen memory 
before it starts being displayed again. If changes 
are made during this time, they will appear as smooth 
transitions as opposed to the regged-edged motion we 
often see when trying to attempt high-speed animation 
with the foreground BASIC program. The background 
processor gives you both screen synchronization and 
high speed data manipulation required for smooth, 

fast animation. This is the same technique used in 
the animation of the various game cartridges and now 
the BLUE RAM.offers you this same method. The following 
tutorial describes a sample background program. 


FAST ACTION GRAPHICS is demonstrated in this machine code 
background routine. Enter this program using your BLUE RAM 
UTILITY and watch the graphic bounce around the screen without 
disturbing what is there! The speed of motion is controlled 

by the #1 knob. Another special effect produced by this 
routine is a "curtain of invisibility" at the top of the screen. 
As the graphic moves behind the curtain, it disappears one- 
half pixel at a time. The size of the curtain is also controlled 
by the #1 knob. Notice that you can still enter programs, etc. 
in BASIC because the graphic movement is performed in the 
background mode where it does not tie up the processor. 


chore of time keeping while the foreground process is f 
| 
| 


\ 
6000 F3 D9 3E 60 ED 47 3E 603F FD El DD Ei El D1 C1 | 
6007 18 D3 OD 21 6A 60 11 6046 F1 ED 7B 7E 70 C9 1F | 
600E 00 70 01 OD 00 ED BO 604D 00 70 56 60 08 00 98 
6015 D9 FB C9 1A 60 CD BO 6054 00 50 00 00 02 08 28 
601C 20 ED-73 7E-70 31 °7E 605B 00 82 00 82 00 AB 2A 
6023 70 F5 C5 D5 E5 DD ES 6062 80 80 80 A8 00 80 00 
602A FD E5 DB 10 32 02 70 6069 2A 20 80 00 05 00 00 


6031 FF 00 07 4C 60 3F 00 6070 00 03 05 00 00 00 03 
6038 70 52 60 07 4c 60 02 
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Location 6000 disables the current background process. 
6001 through 6009 reassign background processing to a 
“routine whose beginning address is can be found in the 
word at location 6018. 600A through 6014 move a motion 
control table into the 7000 area so that this routine 
can operate in the ROM mode if desired. 6015 & 6016 
reenable the background processor. 6017 returns to 

the foreground program from which it was called. 
Loactions 601A through 601C envoke the Original BASIC 
background processor. This is necessary so that the 
note timer can be decremented as required when printing 
characters. Otherwise, the foreground program would 
hang up waiting for the timer to clear and not be able 
to continue with the foreground program. 601D through 
602B save all of the Z80 registers so that their original 
values can be returned to the foreground program. 602C 
through 6030 read the #1 controller knob and place the 
value in the motion control table as the current motion 
velocity multiplier. 6031 through 603E and 604C through 
6051 invoke special graphics and animation services 
built into the Bally Arcade internal ROM. These will be 
discussed in later issues. 603F through 604B restore 
the 280 registers to their original values and return to 
the forground program in progress. 6052 through 6055 
define the boundries of the graphic motion (152 wide and 
40 high). 6056 through 6059 define the coordinate 
reference of the graphic (0,0) and the size of the 
graphic (8x8 pixels). 605A through 6069 is the image of 
the graphic itself. Note that only odd bits are used. 
This is very important when working with this BASIC 
Since even bits store the actual BASIC program statements. 
If these even bits are disturbed, the BASIC program will 
be altered, usually catastrophically. The remainder of 
the program, 606A through 6077 define the constants for 
the motion control table. These values define 5/256ths 
of a pixel times the current velocity multiplier worth 
of motion in both the X and Y coordinates with each 
update (60 times per second). The fastest speed, 
therefore, is 5 pixels x 60 updates = 300 pixels per 
second. The "3's" in the table indicate that the 
graphid is to bounce off the sides instead of stopping. 









































To stop the background process from the foreground 
process using BASIC, enter: :RETURN;GO. To start it up 
again, enter: CALL 24576;GO 


ADDITIONAL BASIC FEATURES are still being found. The 
:INPUT and :LIST operations can be followed by an 
identifier for loading or listing a particular program 
from a tape that contains several programs. When dumping 
these programs to tape the identifier must be placed on 


the tape as follows: :PRINT ;TV=n;TV=m;LIST ... where 
(m)x256+(n) is the identifier. To have BASIC automatically 
find that identifier on tape, use: :INPUT (i) where i is 


the same identifier. Example: :PRINT ;TV=3 ;TV=2;LIST 
sINPUT 515. or.  %:LIST 515. 
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UNLUCKY 8000 is a hex decimal value that BASIC cannot 
perform arithemetic on. It is equivalent in decimal 
value to -32768, outside BASIC's legal range. This only 
presents a problem when the 8000 value is required ina 
machine-code program as it is at locations 6066 and 6067 
in the moving graphic program. Attempts to generate this 
number will work. It is during the read process that a 
HOW? error is produced. There is no known work-around 
for this problem except to avoid reading such a word. As 
was stated, you can generate it, write it to tape, and 
even re-read it from tape without problem. But you 
cannot list it or readit individually using the utility. 


CASSETTE INTERFACE CABLE The schematic is shown for the cable that goes 
between the interface and the Bally itself, for those of you who have 


had problems in that area: 


Nt ‘ 
cassette wtérface 





Hand Cow\re lle f 
Cable 
Cou “a @e bor 
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HALLOWEEN GHOST is a self-running program that is topical. The author 
sets up a TV at a window near his front door, and the program, a 
"talking" skull, makes snide remarks about the people going by. It 
re-cycles, and uses random statements on the screen, shifting colors 
as well. 
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144@ .MOUTH 

1420 X=-32;Y=-24; BOX X,Y, 1B, 

144@ X=-26; Y=-22;BOX X,Y,2,2 

146@ X=-24;Y=-2@;BOX X,Y,2,2 
hore S 
ae ,2 


HALLOWEEN GHOST 
.BY J.WILKINSON 
: RETURN 
FOR Z=1TO 3SB@@Q;NEXT 2 
1@ CLEAR ;BC=RND (€256)-1 

28 FC=BC+4+RND (€323658;:GOSUB 1748 

56 K=-32;7=18;B0x% X,¥,36,2,3 
| 116 Y=16;BOxK X,Y,34,2,3 

138 Y=14:B0x% X,¥,38,2,3 

156 Y=12;BOX X,¥,42,2,3 

176 Y=16;BOX X,Y,46,2,3 

198 Y=@;BOX *,7¥,56,17,3 

219 Y=-16;BOX X,¥Y,46,3,3 

236 Y=-13;BOX X,Y,42,3,3 


a, 2 
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3 3 
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1516 K=-38; Y=-22; BOX 
i536 X=-48; ‘'=-28; BOX 
16@@ .R“EYE 

i616 X=-26; Y=-4;A=RND (5) 

1615 K=X+A; Y=Y¥+A;BOX X,Y,4,6,1 
1626 B=RND (83 

1621 IF B=1GOTO 1646 

1622 IF B=2GO0OTO 1748 

16235 IF B=3G0TO 2988 

1624 IF B=4G0TO 2816 


$ 3 2 
















259 Y=-16;BOxX X,Y,38,3,3 1625 IF B=5GOTO 2@a@7a 

270 Y=-22:BOxK X,Y,34,18,3 1626 IF B=6GOTO 2938 

298 Y=-28;BOX X,Y,38,1,3 1627 IF B=7GOTO 1748 

31@ Y=-29;BOX X,Y,26,1,3 1628 IF B=8GOTO 5 

330 Y=-30;BOxX X,Y, 22,1,3 1646 FOR Z=1TO 2@@6;NEXT Z 
350 Y=-31;BOX X,¥,18,1,3 i641 BOX X,Y,4,6,2;GOTO 1680 






1706 .LYEYE 

1718 J=-44;K=-3;C=RND (5) 

1715 J=J+C;K=K+C;BOX J,K,4,65,1 
1728 E=RND (8) 

1721 IF E=1G0OTO 174@ 

lf722 IF E=2G0TO 1648 

1723 IF E=360TO 3H8a 

1724 IF E=4G0TO 3816 

i725 IF E=SG60TO 3829 





5@Q .R/SKT 

S1@ X=-23;Y=8;BOX X,¥,3,2,2 
S26 Y=0;BOX X,¥,1@,14,2 

S38 Y=-9;BOX X,¥,4,2,2 

880 .L/SKT 

818 X=-41;Y=8;BOX X,Y,4,2,2 
S28 Y=8;BOX x,Y,18,14,2 

838 Y=-8:BOX X,¥Y,3,2,2 

1288 .NOSE 





















122@ ¥=-32;Y=-1@;BOX K,¥,2,2,2 1726 IF E=6GO0TO 3938 

1248 Y=-11;BOX X,¥,4,2,2 1727 IF E=7GOTCG 38468 

1268 Y=-12;BOX X,Y,;8,2,2 i728 IF E=8GoTo 5 

i288 Y=-13;BOX X,Y,6,2,2 1746 FOR Z=1TO 2@@@:NExXT 7 
13288 Y=-14:BOX X,¥,18,2,2 i741 BOX J,K,4,6,2:GOTO 1789 
1328 Y=-16;BOX X,Y,6,1,2 1748 CKX=25;CY=20@;PRINT "* #® * 






1768 CX=-2;CY=19;PRINT “HORRIBLE HARRY 





L786 CxX=@;CY=4;PRINT "THE INSULTING 

1888 CX=173;CY=-18;PRINT "TU GHOST 

1826 CxX=6;CY=-20;PRINT “MYSTERIOUSLY 

1844 CK=22;CY=-38;PRINT "APPEARS 

1866 CX=-62;PRINT "--HERE EVERY HALLOWEEN--";FOR Z=1TO 15@@;NEXT 2;RETURN 
2668 CY=32;PRINT “ WHAT IS YOUR PROBLEM?--";GOTO 1748 

2616 CY¥=32;PRINT " YOU LOOK TERRIBLE!!!---":GoTO 17468 

2924 CY=32;PRINT “ THAT CAN’ T BE -YOUR FACE-“;GOTO 1749 

2038 CY=32;PRINT " YIPES!!-YOU SURE ARE UGLY";GOTO 1748 

3664 CY=32;PRINT “ YOUR WORMS ARE SHOWING-";GOTO 1649 

3419 CY¥=32;PRINT “  ... WHO DUG YOU UP? ...";GOTO 1649 

3824 CY=32;PRINT " HOW COME YOU HAVE 3 EYES? 

3021 *=-32;Y=12; BOX K,Y,7,9,23 BOX 4, %,16,3,2:;BOX X,¥,3,4,1;GOTO § 
3838 CY=32;PRINT “ YOU LOOK LIKE THE -DEVIL-";GoTe 1646 

3046 CY=32;PRINT “ I’D HATE TO BE YOUR MOMMY";GOTO 18465 
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STEREO 
COLOR ORGAN, 
LIGHT SHOW 
ON YOUR TV; 


INTER FACE 
WITH | ‘BALLY 
















olor ” Nha. oe Show: Sestenactoce Balk to an sdehie z 
Cofon poven of 7 watt on up. Will not piled cae ee 5 


aa displays in step with your stereo music 


Complede interface unit with cassette demonstration progaam and 


inéstauetions $29.95 
Add your oum favorite Ant/Graphice, CC 












71 games now available - ALL have full memory usea lots o hics 
action and coloz - ay twe (2 programs See eee, with oe ; 
documentation $10, 00 


ie "5 Treasure 


Ayatollah Dg Dart Board 
i CACUE (ini nop Hi G ) 
anget ({/nio of Yames 
Kil? th 

Sink ie fe ar 
Search & Destroy 

Stara Base 2000 

The Black Lagoon 
Mission Impossible 


FOR FREE (ATALOG WRITE? 7 Oar 
SOFTWARE 
8599 FRAMEWOOD. Dr 
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ADS o Tiny BASIC cartridges $40. ppd. limited quantity - use with your salvage 
: board for dedicated computer operations. Bob Fabris. 
* © BALLY service Center - caters to NY, NJ, & CT - 8900 Boulevard East, 
North Bergen, NJ, 07047 aap 
o STARTEK Electronics will repair your Bally. Send printed circuit board 
and $25 = you will be billed for necessary parts. (i.e-, cost is $25... 
plus parts) 552 Ida Court. Mt. Prospect, Ill, 60056 RES LBS 


* 


o FOR SALE Bally Home Library Computer with 4 hand controllers, BASIC»... %'\ 





Cassette Interface, SPACE INVADERS,CLOWNS,SEAWOLF,280 ZAP,STAR BATT 


4 Mm. 


% 
De P et 
f “1 aS Wa 2 
_ BASEBALL, BINGO MATH. Includes all issues of the ARCADIAN and the ts a ae Ty 


service Manual and schematic. All in good working order. Sacrifice/at | jm 

@235- Bob Whitton,8022 New Salwm St. San Diego CA 92126 7140566-37 59" ° Lf Re 
o FOR SALE Bally Arcade with 4 hand controls, BASIC, BASEBALL, TENNIS,HOGKEY,/ tim, 

HANDBALL, 280 ZAP,RED BARON. $295. Rollin Kaltenbaugh, 1962 Ponderosa—~ one, 
Ave., Memphis TN, 38116 901-345-2267 : : : 
Bally Arcade with BASIC, Interface, 2 controllers BASEBALL,CLOWNS and 
assorted programs in Basic. Any reasonable offer accepted. Larry 
Gallant, 5350 Elmcrest In, Cincinnati OH 45242 
o FOR SALE Bally Arcade -BASIC, interface, FOOTBALL, BLACKJACK,SEAWOLF, 

BASEBALL. 4 hand controllers, $300 or offer Mrs. Jane Smith 920 

S$ Michael Way, Camano Island, WA 98292 206-387-6762 : 
o W & W Software Sales, 6594 Swartout Rd. Algonac MI 48001. We have 9 

tapes with 5 programs each, with or without listings. Or get listings 

only, so you can pick and choose any of the 45 available programs. 

Excellent variety, color, graphics, use of hand controller, and much 

more. Games, business programs, and teaching aides for children and 

adults. Send 25¢ for more information and a copy of Air Traffic 

Controller, or SAE for information only. 
o L &M Software now has "Target(Trio of Games)" and "Kill the Vulcan". 

Full memory usage, pistol grip controlled. Cost is $10. complete, with 

documentation. Free Catalog. To order yours send to L ¢M Software, 

8599 Framewood Dr. Newburgh IN 47630 (money orders get faster service) 
o Sound Quality Enhancement - Here's a full range of sound from your Bally 

with the Sound System I Audio Add-on. Connects to expansion port; cable 

and connector included. Features 4-8 ohm speaker output, 2 pre-amp 

outputs, headphone jack, on/off-volume control. and_117v_ operation. 

Only $28. wired and tested. Identify if you have a Blue Ram. 

Heavy duty power controller to replace Bally wall transformer. All steel 

cabinet construction with on/off switch and indicator light plus an 
_easy-to-replace fuse output. Line cord, Bally power connector, $24. 

Alternative Engineering, 1 Gilbert Drive, Chelsea, ME| 04.330 | 

(above items available late September) ; 

o WANTED Used or rejected BALLY Enrike, apartado 219, Chetumal, 

QROO MEXICO 
o FOR SALE Brand New "Blue Ram" hardware add-on. Assembled with software 

and power supply. Best offer over $150. George Collins, 30 Sierra Ave, 


ce) 
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